home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 93 / 093.d81 / affine boot (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  1KB  |  19 lines
  1. 10 print"[147]":f$="affine":dv=peek(186):ifdv<8thendv=8
  2. 20 poke53281,0:poke53280,0:fori=1to121:reada:poke827+i,a:next:sys828,6,33,17,17,95,13:fori=1to7
  3. 30 sys828,7-i,32+i,17-i,17+i,160,14:next:sys828,0,39,10,10,160,3
  4. 40 sys828,0,39,24,24,160,6
  5. 50 fori=1to11:reada$:poke214,11+i:poke211,20-len(a$)/2:sys58732:print"[154]"a$:next:print"[144]":print"
  6. 60 [153]"load";[199](34);f$;[199](34)","dv:[153]"run":[151]631,13:[151]632,13:[151]198,2:[128]:[153]"
  7. 70 data169,0,141,180,3,32,168,3,172,180,3,153,181,3,238,180,3,192,5,208,240
  8. 80 data32,154,3,165,214,72,165,211,72,174,183,3,160,0,24,32,240,255,206
  9. 90 data181,3,172,182,3,173,185,3,201,255,240,2,145,209,173,186,3,145,243
  10. 100 data136,204,181,3,208,236,165,214,205,184,3,240,8,230,214,32,108,229
  11. 110 data76,102,3,169,19,32,210,255,104,133,211,104,133,214,76,108,229
  12. 120 data160,24,185,217,0,9,128,153,217,0,136,16,245,96,32,253,174,32,138
  13. 130 data173,32,247,183,165,20,96,0,"[193][198][198][201][206][197] [212][210][193][206][211][198][207][210][205][211]","by [201]an [193]dam"
  14. 140 data"([195])1992 by [211]oftdisk [208]ublishing",,"[212]his is the copyrighted work of
  15. 150 [131]"(NULL)(NULL)asc(NULL)str$right$(NULL)(NULL) (NULL)(NULL)peek(NULL)right$(NULL)left$right$(NULL)chr$. right$t is (NULL)(NULL)(NULL) intended
  16. 160 data"for distribution as public domain","or shareware.  [208]lease report illegal
  17. 170 [131]"distribution of this program by","calling (NULL)(NULL)asc(NULL)str$right$(NULL)(NULL) lenustomer service at:
  18. 180 data"1-800-831-2694 or 1-318-221-8718
  19.